100 POKE 53280,0:POKE53281,0:POKE646,1
101 PRINT"[147]"
102 POKE53272,22
103 PRINT"
104 [153]" LEFT$ALLO LEN64 ASCREAX ! LEFT$IER IST MAL
105 PRINT" WIEDER [212]HE [207]LLY MIT EIN BISSCHEN
106 [153]" (null)OFTWARE FUER EUCH !
107 PRINT"
108 [153]"  1 - LEN64ER LENLUB RIGHT$NFORMATION
109 :PRINT: PRINT"  2 - 90 SEC. [194]ACKUP
110 :[153]:[153]"  3 - (null)OESCHSCHUTZ 3
111 PRINT: PRINT"  4 - [196]ISKETTENQUAELER
112 [153]:[153]"  5 - STR$REAM (null)RITER
113 GETA$:IF A$=""THEN 113
114 IFA$="1"THEN B$="001.*":GOTO2199
115 IFA$="2"THEN B$="002.*":GOTO2199
116 IFA$="3"THEN B$="003.*":GOTO2199
117 IFA$="4"THEN B$="004.*":GOTO2199
118 IFA$="5"THEN B$="005.*":GOTO2199
120 PRINT"
2199 [151] 53281,0:[151]53280,0:[151]646,0
2200 [151]828,0:[153][199](147)[199](17)
2210 [153]"LOAD"[199](34);B$;[199](34);",8
2220 PRINT CHR$(17)CHR$(17)CHR$(17)CHR$(17)"RUN"
2230 POKE631,13:POKE632,13:POKE198,2
2240 PRINT CHR$(19);:END
2300 PRINT"[147]":SYS57812(B$),8,1:POKE780,0:SYS65493
2310 SYS49152:RUN
2600 POKE828,0:PRINTCHR$(19)CHR$(17)
2610 PRINT"LOAD"CHR$(34);B$;CHR$(34);",8
2620 [153] [199](17)[199](17)[199](17)[199](17)"PRINT"[199](34);"PRINT";[199](34)":RUN"
2630 [151]631,13:[151]198,1
2640 [153] [199](19);:[128]
3000 [153]"LOAD OPEN                                     WAIT"